d/dr (16000-800P)(A^0.5)(R^0.5)